diff --git a/CHANGELOG.md b/CHANGELOG.md
index 7bdc908dc..aaaf639be 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -20,6 +20,7 @@ high state of flux, you're at risk of it changing without notice.
 
 - **Polish**
   - add `chainTaskOptionKW`, #1744 (@AmirabbasJ)
+  - fix `fromEntries` return type, closes #1745 (@gcanti)
     fix wrong type parameter order:
   - `FromIO`
     - `chainIOK`
diff --git a/docs/modules/ReadonlyRecord.ts.md b/docs/modules/ReadonlyRecord.ts.md
index 4ce3a1bfa..5a87bd270 100644
--- a/docs/modules/ReadonlyRecord.ts.md
+++ b/docs/modules/ReadonlyRecord.ts.md
@@ -1324,7 +1324,7 @@ Converts a `ReadonlyArray` of `[key, value]` tuples into a `ReadonlyRecord`.
 **Signature**
 
 ```ts
-export declare const fromEntries: <A>(fa: readonly (readonly [string, A])[]) => Record<string, A>
+export declare const fromEntries: <A>(fa: readonly (readonly [string, A])[]) => Readonly<Record<string, A>>
 ```
 
 **Example**
diff --git a/src/ReadonlyRecord.ts b/src/ReadonlyRecord.ts
index f3de78c68..b5665be43 100644
--- a/src/ReadonlyRecord.ts
+++ b/src/ReadonlyRecord.ts
@@ -1124,7 +1124,7 @@ export const toEntries = toReadonlyArray
  *
  * assert.deepStrictEqual(fromEntries([['a', 1], ['b', 2], ['a', 3]]), { b: 2, a: 3 })
  */
-export const fromEntries = <A>(fa: ReadonlyArray<readonly [string, A]>): Record<string, A> => {
+export const fromEntries = <A>(fa: ReadonlyArray<readonly [string, A]>): ReadonlyRecord<string, A> => {
   const out: Record<string, A> = {}
   for (const a of fa) {
     out[a[0]] = a[1]